EXTENDED CPC DSK File Disk-Info Spectaculator(Track-Info R Track-Info  R 3DTANX TANX2 7 TANX3 ! DISK PLUS3DOSr^rd CLS f!O,O;:a=I24:pap;s$:a h O,O;: inks=7020l:cls=100d 's$=" " .O=0:I=1:tab=I:hs=0:p=I ag=20:am=ag g$="1" 01e3:g=I 2k$="1"hs=0:400 4k$="2"500 6k$="i"1050 8k$="c"1100L : 1 pl <p>I517 sc=O:p=I:pap=6:cls 3e3 :sc>hshs=sc cls c9 ,8;"One Player";11 ,8;"SCORE = ";sc;13 ,8;" Hi SCORE = ";hs inks:3040 >1 hs=O:5:cls 011 ,2;"How Many Players ? (Max 6)"  inks:k$<"2"k$>"6"514  p=k$:s(p) (5:pap=6:cls:4,O; >a=1p:a+a+4,4;"Player ";a;" Score = "; hs>Os(a)=hsI  s(a):O:a  inks:g>p300, cls  10 ,11 ;"Player ";g 1inks:3e3 :s(g)=s(g)+sc:s(g)>hshs=s(g) g=g+I:517  INTRO I:pap=7:cls  B6:s$;" ""TANX"" A Program by DkTRONICS ";s$'''':7  " PRESS"''' Z" ""I"" for 'INFO'"''" ""C"" to CHANGE game type"''" ""1"" to change to 1 PLAYER game"'' E" ""2"" for 2 OR MORE Players"'''" Any other key for no change"''' #" (1 or 2 will zero ALL Scores )" inks:  INFO $4:pap=7:cls &^1,1;"SCORES"''" ACTIVE Tanks.......TURRET..500"'';20;"HULL....200"'' (k" IMMOBILISED Tanks..TURRET..200"''" Tanks OVER BRIDGE....MINUS.100";9 ,22;1;"_____"'' ,10720:inks:300, 0" KEYS"'' 1E" Gun LEFT & RIGHT """;¾29133q;""" """;¾29129q;""""'' 2E" Gun UP & DOWN """;¾29121q;""" """;¾29125q;""""'' 44" HOLD """;¾29116q;""" (Any key releases)"'' 6!" FIRE """;¾29137q;""""'' 8$" ""SPACE"" will ABANDON any Game" < L REDEF `(3:tab=2:pap=6:cls dI,I;"PRESS"'' fo3,tab;"1. for EASIER start";5,tab;"2. for MODERATE start";7,tab;"3. for DIFFICULT start" jJ9 ,tab;"4. for RATIONED AMMO";11 ,tab;"5. for STOCK of AMMO" ns13 ,tab;"6. to REDEFINE the KEYS";15,tab;"7. for PRACTICE";16,9 ;"(Tank Fire Harmless)" p19,tab;"R. to RETURN" r29705 t,I tinks zk$="r"300Track-Info  R , |-k$<"1"k$>"7".5,0:1140t ~k$+1150~ ,ag=25-k$*5:g$=k$:1160 ,am=20+(k$="5")*180:1160  1200 29705 t,ag e21,12 ;" O.K. ":.5,20:21,12 ;" ":1140t  KEYS pap=7:cls 03,I;"PRESS KEY REQUIRED for..."''''  10731 7d=1240:b=29133q:x=7:y=20:d b=29129q:y=25:d )b=29121q:x=9 :y=20:d )b=29125q:x=9 :y=25:d )b=29116q:x=11 :y=7:d b=29137q:x=13 :d >30565ew,29116q:a=1100d:a:1100L x,y;1;¾b  inks:k=k$ k<480k>122zd k>96`k=k-32 b,k:x,y;6;k:  BASIC 02:pap=5:cls 6'5,O;6;s$;s$;s$;s$;I;s$ :Na=814:a+7,14-a;4;s$(a*2+4):a Dh$=s$(6-(hs))+hs J422,O;" TYPE AMMO SCORE HiSCORE " L=" ";g$;"  0  0 ";h$;" " R 28967'q,ag:28969)q,am Tx=28432o V(sc=28545o+28546o*256 X 7: l INKeys v""7030v xa=I30:k$=:k$"" za | .02{# =,40(:7032x ^U0:28430o:"Tanx2":"Tanx3":23659k\,0:100d:200 PLUS3DOS@8) ?0~`??0` |????0`?? x???p` p???~?p?? `????> p`0???` 0`??0`<0`??0`80x< x<@Apx< xx<A? x<0x0x>?x888x8A?8`x<00x>D D@DDTrack-Info  R !?0 <38px?D x8xD#? 00?x 8$??|x?x @@D&c?&&& p& ?xx8$8Ax?@ *q:MoG:oBHoC:H\???˧!:MoG:oBFHoCF# =C$q>2o>02!p'oodo o>2oEo!:z"$q>2!pɧR0*ox :o(Xp$"o2o&z [oc.zRR_R0#"o[o>ͥp"pLp8pnp,ͥp"pLp8ppͥp"pLp8p͒p2 (y~~|:z *q6X#6c*"q6X#6c#6c* q>w#>2!p2(q2mw!"o! "q! p$$&,:(q<2(q :'q(=2'q:)qq2)q!"o:)q&o͆o:\ :\HawS(2W(VT(F( Ys ]*q%|(T"qO*q$|(F"qA:q((7(F(U(,>7 >F>U>d2q:qd(U(F(7(>(*qp,.$/͆r$$$͆rp,*q$$$$lrÎs:q_p$%%%,p,.$>2!p-%p$,%%%>2Moo>F2MoNo>2&q=2!p>2!p-%p$,%%%>2!p*q, *q,,*q,,,$$$$>2!plr:s<2sŽs>2s:)qʎs=2)qs*q,$$$$$͘rrrrQsÎs*q~X(c##[qr#:q7(F(U( d( 66 66$60>2&q2!p*q~c(qX ###^*qgoss _poc(_:s( <2s>2MoNop4# ( iv+6X͊w:mwx>2s:&qjyqjy:'q O:"t<2"t>2"t* q+ @CooG=O~+~*"q~cX(####6#ͼur#q#6* q>w#*"q~cX ####nft>$>t~%%ͥp(tͥp( t<$"p[ qw*"q~cXu####nfu|uu F( %|(&t$~=wu (u2u-v6XdBw~u%%%%%w6X͌u%%%͘rr,,,,>2!pp>2Moo>22MoNo>2!pp>2!p! "oo2Wͼur~((5~((4"p[ q~(FF$$nw%% CooO:'q$$-͌u,};vH>nw2mw>2!ps%%--:mw("p$$$$$$~ p$,>F2MoNo>2&q>2!p%%--"pX V(p$,>2!p!X w#>8 x>d2MoNo>? x>2MoNo> x>2MoNo* q B! p$! }( Hy}y|(+~yx( ( ( #3yu~ (Rx( ( ( "3yK|(F~!(#y( ( ( !3y}(~ p#$>2Fx&,:Fx(ppkxhx~\y^y>&>_p>2Fxt#txtGxq   c    c    c     c  c     c     c!<>|=$X=>|Bǫǃ<~~<8||8<~~<>><<888>/_m-w"ww"wZ$xX=>|B`@@/_[ZD~F=jt>m<~<~@@????<<`?????< I517 sc=O:p=I:pap=6:cls 3e3 :sc>hshs=sc cls c9 ,8;"One Player";11 ,8;"SCORE = ";sc;13 ,8;" Hi SCORE = ";hs inks:3040 >1 hs=O:5:cls 011 ,2;"How Many Players ? (Max 6)"  inks:k$<"2"k$>"6"514  p=k$:s(p) (5:pap=6:cls:4,O; >a=1p:a+a+4,4;"Player ";a;" Score = "; hs>Os(a)=hsI  s(a):O:a  inks:g>p300, cls  10 ,11 ;"Player ";g 1inks:3e3 :s(g)=s(g)+sc:s(g)>hshs=s(g) g=g+I:517  INTRO I:pap=7:cls  B6:s$;" ""TANX"" A Program by DkTRONICS ";s$'''':7  " PRESS"''' Z" ""I"" for 'INFO'"''" ""C"" to CHANGE game type"''" ""1"" to change to 1 PLAYER game"'' E" ""2"" for 2 OR MORE Players"'''" Any other key for no change"''' #" (1 or 2 will zero ALL Scores )" inks:  INFO $4:pap=7:cls &^1,1;"SCORES"''" ACTIVE Tanks.......TURRET..500"'';20;"HULL....200"'' (k" IMMOBILISED Tanks..TURRET..200"''" Tanks OVER BRIDGE....MINUS.100";9 ,22;1;"_____"'' ,10720:inks:300, 0" KEYS"'' 1E" Gun LEFT & RIGHT """;¾29133q;""" """;¾29129q;""""'' 2E" Gun UP & DOWN """;¾29121q;""" """;¾29125q;""""'' 44" HOLD """;¾29116q;""" (Any key releases)"'' 6!" FIRE """;¾29137q;""""'' 8$" ""SPACE"" will ABANDON any Game" < L REDEF `(3:tab=2:pap=6:cls dI,I;"PRESS"'' fo3,tab;"1. for EASIER start";5,tab;"2. for MODERATE start";7,tab;"3. for DIFFICULT start" jJ9 ,tab;"4. for RATIONED AMMO";11 ,tab;"5. for STOCK of AMMO" ns13 ,tab;"6. to REDEFINE the KEYS";15,tab;"7. for PRACTICE";16,9 ;"(Tank Fire Harmless)" p19,tab;"R. to RETURN" r29705 t,I tinks zk$="r"300, |-k$<"1"k$>"7".5,0:1140t ~k$+1150~ ,ag=25-k$*5:g$=k$:1160 ,am=20+(k$="5")*180:1160  1200 29705 t,ag e21,12 ;" O.K. ":.5,20:21,12 ;" ":1140t  KEYS pap=7:cls 03,I;"PRESS KEY REQUIRED for..."''''  10731 7d=1240:b=29133q:x=7:y=20:d b=29129q:y=25:d )b=29121q:x=9 :y=20:d )b=29125q:x=9 :y=25:d )b=29116q:x=11 :y=7:d b=29137q:x=13 :d >30565ew,29116q:a=1100d:a:1100L x,y;1;¾b  inks:k=k$ k<480k>122zd k>96`k=k-32 b,k:x,y;6;k:  BASIC 02:pap=5:cls 6'5,O;6;s$;s$;s$;s$;I;s$ :Na=814:a+7,14-a;4;s$(a*2+4):a Dh$=s$(6-(hs))+hs J422,O;" TYPE AMMO SCORE HiSCORE " L=" ";g$;"  0  0 ";h$;" " R 28967'q,ag:28969)q,am Tx=28432o V(sc=28545o+28546o*256 X 7: l INKeys v""7030v xa=I30:k$=:k$"" za | .02{# =,40(:7032x ^U0:28430o:"Tanx2":"Tanx3":23659k\,0:100d:200 Track-Info  R Track-Info  R Track-Info  R Track-Info R         Track-Info R         Track-Info R         Track-Info R         Track-Info R         Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info  R Track-Info R         Track-Info ! R!!!!!!!!! Track-Info " R""""""""" Track-Info # R######### Track-Info $ R$$$$$$$$$ Track-Info % R%%%%%%%%% Track-Info & R&&&&&&&&& Track-Info ' R'''''''''